home *** CD-ROM | disk | FTP | other *** search
/ How Many Bugs in a Box / How Many Bugs in a Box.cdr / bugs / page2 / 00015.ls < prev    next >
Encoding:
Text File  |  1995-03-29  |  244 b   |  17 lines
  1. on mouseUp
  2.   global lady
  3.   set lady to lady + 1
  4.   if lady > 3 then
  5.     set lady to 1
  6.   end if
  7.   if lady = 1 then
  8.     go("polka dance")
  9.   else
  10.     if lady = 2 then
  11.       go("little bugs")
  12.     else
  13.       go("color cycle")
  14.     end if
  15.   end if
  16. end
  17.